90 REM" 19-JAN-89
100 [153]"LIST          ********************
110 PRINT"          *   FONT GRABBER   *
120 [153]"          * FOR  OPEN SYSTEM *
130 PRINT"          ********************[154]
140 [139] [194](648)[178]204 [167] [137] 150
142 [153]" 'NORSK' IS USED TO CONFIGURE
144 PRINT"  CBM 64 FOR CHARACTER IN RAM
146 _X"NORSK
150 INPUT"CHARACTER-SET";F$
160 IF F$="" THEN PRINT"[145][145][145]":GOTO150
170 PRINT"[147]OPEN SYSTEM PRESENTS YOUR NEW "
180 PRINT"CHARACTER-SET [ \ ]";CHR$(14)
220 ADR=232*256:REM" UNDER KERNAL
230 [159]1,8,0,F$:[151]185,0
240 [151]780,0:[151]782,ADR[173]256:[151]781,ADR[171][194](782)[172]256:[158]65493
250 [160]1:_E